home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
076-100
/
disk_078
/
mandelvroom
/
nav.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-06
|
2KB
|
65 lines
/***************************************************************************
*
* MandelVroom Navigation Control
*
* Kevin L. Clague
*
* Copyright (C) 1987
*
**************************************************************************/
#include "mand.h"
extern struct RastPort *rp;
extern USHORT CmdMode;
LONG NavTop, NavBot, NavLeft, NavRight;
extern SHORT XScale, YScale;
SHORT BoxSizeX = 3, BoxSizeY = 3, DragSize = 3;
DrawBox( Left, Top, Right, Bottom)
SHORT Top, Left, Bottom, Right;
{
SetDrMd(rp, COMPLEMENT);
/*
* Draw the new box
*/
Move(rp, Left, Top );
Draw(rp, Right, Top );
Draw(rp, Right, Bottom);
Draw(rp, Left, Bottom);
Draw(rp, Left, Top+1 );
SetDrMd(rp, JAM1);
} /* DrawBox */
DrawExtras( Left, Top, Right, Bottom)
SHORT Top, Left, Bottom, Right;
{
SetDrMd(rp, COMPLEMENT);
/*
* Draw Resize gadget
*/
Move(rp, Right - 1, Bottom - (BoxSizeY << YScale));
Draw(rp, Right - (BoxSizeX << XScale), Bottom - (BoxSizeY << YScale));
Move(rp, Right - (BoxSizeX << XScale), Bottom + 1 - (BoxSizeY << YScale));
Draw(rp, Right - (BoxSizeX << XScale), Bottom - 1);
Move(rp, Left + 1, Top + (DragSize << YScale));
Draw(rp, Right - 1, Top + (DragSize << YScale));
/*
* Drag bar bar / close gadget separator
*/
Move(rp, Left + (4 << XScale), Top + 1);
Draw(rp, Left + (4 << XScale), Top + (DragSize << YScale) -1 );
SetDrMd(rp, JAM1);
} /* DrawBox */